home *** CD-ROM | disk | FTP | other *** search
/ Compendium Deluxe 2 / LSD and 17bit Compendium Deluxe - Volume II.iso / a / prog / misc / xes120.lha / XES / REXX / Close.xdme < prev    next >
Text File  |  1994-11-09  |  157b  |  10 lines
  1. /* Close.xdme */
  2.  
  3. Address AREXX '"Call CreateHost CPORT, NOTPORT"'
  4. Do Until ShowList(P,CPORT)
  5.     Call Delay(10)
  6. End
  7.  
  8. Call CloseWindow CPORT
  9. Call Quit CPORT
  10.